home *** CD-ROM | disk | FTP | other *** search
/ How Would You Survive? / How Would You Survive (1995)(Grolier)[Mac-PC].iso / pc / egyptw.dir / 01705_Script_Animate-To-From < prev    next >
Text File  |  1995-09-13  |  518b  |  23 lines
  1. global gBeenClicked 
  2.  
  3. on AnimateCircle3 whichsprite, whichsound
  4.   global gAnimationcast
  5.   puppetsound whichsound
  6.   set gAnimationcast = the castnum of sprite whichsprite
  7.   repeat with x = 1 to 2
  8.     set the castnum of sprite whichsprite = gAnimationcast + x
  9.     updatestage
  10.     wait .1
  11.   end repeat
  12.   wait 1
  13.   repeat with x = 1 down to 0
  14.     set the castnum of sprite whichsprite = gAnimationcast + x
  15.     updatestage
  16.     wait .1
  17.   end repeat
  18.   wait .2
  19.   Puppetsound 0
  20.   set gBeenClicked = 0
  21. end
  22.  
  23.